(Info-restore-point): Don't wipe out hl before using it.

diff --git a/lisp/info.el b/lisp/info.el
index d2cff3aec96b8bf62b2789fddfe4cf037ba0d35f..06496692f7581706587737992d425332c5ad82ba 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -583,8 +583,8 @@ In standalone mode, \\<Info-mode-map>\\[Info-exit] exits Emacs itself."
     (if (and (equal (nth 0 (car hl)) Info-current-file)
             (equal (nth 1 (car hl)) Info-current-node))
        (progn
-         (setq hl nil)                 ;terminate the while at next iter
-         (goto-char (nth 2 (car hl))))
+         (goto-char (nth 2 (car hl)))
+         (setq hl nil))                ;terminate the while at next iter
       (setq hl (cdr hl)))))
 \f
 (defvar Info-last-search nil